Compendium Deluxe 1/LSD Compendium Deluxe 1.iso/a/text/manipulation/cv.lha/cv/scripts/SBP->ASCII.cvt

Text File | 1993-12-31 | 7.0 KB | 332 lines

/*
 *  Oxxi's SBase4 DML code (.SBP files) to ASCII
 *
 *  Implemented Wed Dec 15 04:02:46 1993 by Tobias Ferber,  All Rights Reserved
 */


// DML tokens

/*
$ff,   0 -> " ";
*/

$ff,   1 -> " + ";
$ff,   2 -> " - ";
$ff,   3 -> " * ";
$ff,   4 -> " / ";
$ff,   5 -> " <> ";
$ff,   6 -> " = ";
$ff,   7 -> " >= ";
$ff,   8 -> " > ";
$ff,   9 -> " <= ";
$ff,  10 -> " < ";
$ff,  11 -> " ^ ";
$ff,  12 -> " AND ";
$ff,  13 -> " OR ";
$ff,  14 -> "LIKE ";
$ff,  15 -> "MOD ";
$ff,  16 -> "CONTAINS ";

$ff,  17 -> "+ ";       // ??? $ff,1

$ff,  18 -> "ABS ";
$ff,  19 -> "ATN ";
$ff,  20 -> "CHR$ ";
$ff,  21 -> "COS ";
$ff,  22 -> "EXP ";
$ff,  23 -> "INT ";
$ff,  24 -> "LOG ";
$ff,  25 -> "RND ";
$ff,  26 -> "SGN ";
$ff,  27 -> "SIN ";
$ff,  28 -> "SQR ";
$ff,  29 -> "STR$ ";
$ff,  30 -> "TAN ";
$ff,  31 -> "DATE$ ";
$ff,  32 -> "FIX ";
$ff,  33 -> "FREE ";
$ff,  34 -> "ROW ";
$ff,  35 -> "COL ";
$ff,  36 -> "PROW ";
$ff,  37 -> "PCOL ";
$ff,  38 -> "ERRNO ";
$ff,  39 -> "SPACE$ ";
$ff,  40 -> "ERR$ ";
$ff,  41 -> "FORMAT$ ";
$ff,  42 -> "DDE$";
$ff,  43 -> "LEFT$ ";
$ff,  44 -> "MID$ ";
$ff,  45 -> "RIGHT$ ";
$ff,  46 -> "ASC ";
$ff,  47 -> "LEN ";
$ff,  48 -> "VAL ";
$ff,  49 -> "DAYS ";
$ff,  50 -> "DAY$ ";
$ff,  51 -> "DAY ";
$ff,  52 -> "MONTH$ ";
$ff,  53 -> "MONTH ";
$ff,  54 -> "YEAR ";
$ff,  55 -> "TIME$ ";
$ff,  56 -> "TIMEVAL ";
$ff,  57 -> "HRS ";
$ff,  58 -> "MINS ";
$ff,  59 -> "SECS ";
$ff,  60 -> "THOUSECS ";
$ff,  61 -> "LCASE$ ";
$ff,  62 -> "UCASE$ ";
$ff,  63 -> "INSTR ";
$ff,  64 -> "DISKSPACE ";
$ff,  65 -> "RECCOUNT ";
$ff,  66 -> "EOF ";
$ff,  67 -> "FOUND ";
$ff,  68 -> "LOOKUP ";
$ff,  69 -> "FCASE$ ";
$ff,  70 -> "TRIM$ ";
$ff,  71 -> "REPLICATE ";
$ff,  72 -> "LTRIM$ ";
$ff,  73 -> "SER ";
$ff,  74 -> "EXISTS ";
$ff,  75 -> "PAD$ ";

/*
$ff,  76 -> "";
$ff,  77 -> ".";
$ff,  78 -> "";
*/

$ff,  79 -> "NOT ";
$ff,  80 -> "PI ";
$ff,  81 -> "TODAY ";
$ff,  82 -> "NOW ";
$ff,  83 -> "FIELD ";
$ff,  84 -> "APPEND ";
$ff,  85 -> "AS ";
$ff,  86 -> "ASCENDING ";
$ff,  87 -> "BUFFERS ";
$ff,  88 -> "COUNT ";
$ff,  89 -> "CURRENT ";
$ff,  90 -> "DISK ";
$ff,  91 -> "DESCENDING ";
$ff,  92 -> "DOWN ";
$ff,  93 -> "DUPLICATE ";
$ff,  94 -> " ELSE ";
$ff,  95 -> "ERROR ";
$ff,  96 -> "FIRST ";
$ff,  97 -> "FROM ";
$ff,  98 -> "LAST ";
$ff,  99 -> "LINE ";
$ff, 100 -> "MEAN ";
$ff, 101 -> "OFF ";
$ff, 102 -> "PAGING ";
$ff, 103 -> "PREVIOUS ";
$ff, 104 -> "PRINTER ";
$ff, 105 -> "QUERY ";
$ff, 106 -> "RECORD ";
$ff, 107 -> "STEP ";
$ff, 108 -> "SUM ";
$ff, 109 -> "SUMMARIZE ";
$ff, 110 -> "TABLE ";
$ff, 111 -> "TEXT ";
$ff, 112 -> " THEN ";
$ff, 113 -> "TO ";
$ff, 114 -> "UNIQUE ";
$ff, 115 -> "USING ";
$ff, 116 -> "ALL ";
$ff, 117 -> "POST ";
$ff, 118 -> "GOSUB ";
$ff, 119 -> " GOTO ";
$ff, 120 -> "RESTORE ";
$ff, 121 -> "RESUME ";
$ff, 122 -> "LIST ";
$ff, 123 -> "? ";
$ff, 124 -> "ADD ";
$ff, 125 -> "AFTER ";
$ff, 126 -> "ASK ";
$ff, 127 -> "BELL ";
$ff, 128 -> "BEFORE ";
$ff, 129 -> "BLANK ";
$ff, 130 -> "BREAK ";
$ff, 131 -> "CALL ";
$ff, 132 -> "CHAIN ";
$ff, 133 -> "CLEAR ";
$ff, 134 -> "CLOSE ";
$ff, 135 -> "CLS ";
$ff, 136 -> "COPY ";
$ff, 137 -> "CREATE ";
$ff, 138 -> "DATA ";
$ff, 139 -> "DATEBASE ";
$ff, 140 -> "DEBUG ";
$ff, 141 -> "DELETE ";
$ff, 142 -> "DIRECTORY ";
$ff, 143 -> "DISPLAY ";
$ff, 144 -> "EDIT ";
$ff, 145 -> "EJECT ";
$ff, 146 -> "END ";
$ff, 147 -> "MAX ";
$ff, 148 -> "ENTER ";
$ff, 149 -> "ERASE ";
$ff, 150 -> "EXECUTE ";
$ff, 151 -> "EXPORT ";
$ff, 152 -> "FIELDS ";
$ff, 153 -> "FILE ";
$ff, 154 -> "FOOTING ";
$ff, 155 -> " FOR ";
$ff, 156 -> "FORM ";
$ff, 157 -> "GET ";
$ff, 158 -> "GROUP ";
$ff, 159 -> "HEADING ";
$ff, 160 -> "HOME ";
$ff, 161 -> "IF ";
$ff, 162 -> "IMPORT ";
$ff, 163 -> "INDEX ";
$ff, 164 -> "INPUT ";
$ff, 165 -> "KEY ";
$ff, 166 -> "LABELS ";
$ff, 167 -> "LET ";
$ff, 168 -> "LOAD ";
$ff, 169 -> "LOCATE ";
$ff, 170 -> "MAKE ";
$ff, 171 -> "MEMORY ";
$ff, 172 -> "MENU ";
$ff, 173 -> "MERGE ";
$ff, 174 -> "MODIFY ";
$ff, 175 -> "NEWLINE ";
$ff, 176 -> "NEW ";
$ff, 177 -> "NEXT ";
$ff, 178 -> "NUMBASE ";
$ff, 179 -> "ON ";
$ff, 180 -> "OPEN ";
$ff, 181 -> "ORDER ";
$ff, 182 -> "OUTPUT ";
$ff, 183 -> "PASSWORD ";
$ff, 184 -> "POSITION ";
$ff, 185 -> "PRINT ";
$ff, 186 -> "PROTECT ";
$ff, 187 -> "QUIT ";
$ff, 188 -> "READ ";
$ff, 189 -> "REM";
$ff, 190 -> "REMOVE ";
$ff, 191 -> "RENAME ";
$ff, 192 -> "REORGANIZE ";
$ff, 193 -> "REPORT ";
$ff, 194 -> "REQUEST ";
$ff, 195 -> "RETURN ";
$ff, 196 -> "RUN ";
$ff, 197 -> "SAVE ";
$ff, 198 -> "SAY ";
$ff, 199 -> "SCRDUMP ";
$ff, 200 -> "SHOW ";
$ff, 201 -> "SELECT ";
$ff, 202 -> "SET ";
$ff, 203 -> "STATUS ";
$ff, 204 -> "STORE ";
$ff, 205 -> "UPDATE ";
$ff, 206 -> "VIEW ";
$ff, 207 -> "WAIT ";
$ff, 208 -> "WHERE ";
$ff, 209 -> "FG ";
$ff, 210 -> "BG ";
$ff, 211 -> "UL ";
$ff, 212 -> "BF ";
$ff, 213 -> "IT ";
$ff, 214 -> "ATTR ";
$ff, 215 -> "DIM ";
$ff, 216 -> "WHILE ";
$ff, 217 -> "WEND ";
$ff, 218 -> "MIN ";
$ff, 219 -> "VAR ";
$ff, 220 -> "SD ";
$ff, 221 -> "PG ";
$ff, 222 -> "COMMS ";
$ff, 223 -> "MOUSE ";
$ff, 224 -> "SHARE ";
$ff, 225 -> "LOCK ";
$ff, 226 -> "PANEL ";
$ff, 227 -> "USERNAME ";
$ff, 228 -> "MACRO ";
$ff, 229 -> "FN ";
$ff, 230 -> "CASE ";
$ff, 231 -> "IS ";
$ff, 232 -> "DDEINIT ";
$ff, 233 -> "DDEEXEC ";
$ff, 234 -> "DDETERM ";
$ff, 235 -> "DDEREQ ";
$ff, 236 -> "DDEPOKE ";
$ff, 237 -> "PAGE ";
$ff, 238 -> "REGISTER ";
$ff, 239 -> "UNLOCK ";
$ff, 240 -> "SQL ";
$ff, 241 -> "DIALOG ";

/*
$ff, 242 -> "ÿÿÿÿü";
$ff, 243 -> "";
$ff, 244 -> "";
$ff, 245 -> "";
$ff, 246 -> "";
$ff, 247 -> "";
$ff, 248 -> "";
$ff, 249 -> "";
$ff, 250 -> "";
$ff, 251 -> "";
*/

$ff, 252 -> "Update filter";

/*
$ff, 253 -> "";
$ff, 254 -> "";
$ff, 255 -> "";
*/


// newline

"\r\n"   -> "\n";


// indentation

27,  2   -> " ";
27,  3   -> "  ";
27,  4   -> "   ";
27,  5   -> "    ";
27,  6   -> "     ";
27,  7   -> "      ";
27,  8   -> "       ";
27,  9   -> "        ";
27, 10   -> "         ";
27, 11   -> "          ";
27, 12   -> "           ";
27, 13   -> "            ";
27, 14   -> "             ";
27, 15   -> "              ";
27, 16   -> "               ";
27, 17   -> "                ";
27, 18   -> "                 ";
27, 19   -> "                  ";
27, 20   -> "                   ";
27, 21   -> "                    ";
27, 22   -> "                     ";
27, 23   -> "                      ";
27, 24   -> "                       ";
27, 25   -> "                        ";
27, 26   -> "                         ";
27, 27   -> "                          ";
27, 28   -> "                           ";
27, 29   -> "                            ";
27, 30   -> "                             ";
27, 31   -> "                              ";
27, 32   -> "                               ";
27, 33   -> "                                ";
27, 34   -> "                                 ";
27, 35   -> "                                  ";
27, 36   -> "                                   ";
27, 37   -> "                                    ";
27, 38   -> "                                     ";
27, 39   -> "                                      ";
27, 40   -> "                                       ";

// END SBP->ASCII.cvt